﻿Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        showProduct()
        showStore()
    End Sub

    Private Sub showProduct()
        cboproduct.ValueMember = ("ProductCode")
        cboproduct.DisplayMember = ("ProductName")
        cboproduct.DataSource = cmd.ExecuteDataTable("select ProductCode,ProductName from Product")
    End Sub
    Private Sub showStore()
        cbostore.ValueMember = ("StoreId")
        cbostore.DisplayMember = ("StoreName")
        cbostore.DataSource = cmd.ExecuteDataTable("select StoreId,StoreName from Store")
    End Sub


End Class
